home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / lsp / seq.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  2.4 KB  |  76 lines
  1.  
  2. static object LI1();
  3. static object LI2();
  4. static object LI3();
  5. static object LI4();
  6. static object LI5();
  7. static object LI6();
  8. static object LI7();
  9. static object LI1();
  10. static int VK1defaults[1]={-1};
  11. static struct { short n,allow_other_keys;int *defaults;
  12.      int keys[1];} LI1key={1,0,VK1defaults,{1}};
  13. #define VMB1 register object *base=vs_top; object Vcs[4];
  14. #define VMS1  register object *sup=vs_top+7;vs_top=sup;
  15. #define VMV1 vs_reserve(7);
  16. #define VMR1(VMT1) vs_top=base ; return(VMT1);
  17. static object LI2();
  18. #define VMB2 register object *base=vs_top; object  V31 ,V24 ,V20; object Vcs[2];
  19. #define VMS2  register object *sup=vs_top+2;vs_top=sup;
  20. #define VMV2 vs_reserve(2);
  21. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  22. static object LI3();
  23. #define VMB3 register object *base=vs_top; object  V55 ,V39; object Vcs[4];
  24. #define VMS3  register object *sup=vs_top+2;vs_top=sup;
  25. #define VMV3 vs_reserve(2);
  26. #define VMR3(VMT3) vs_top=base ; return(VMT3);
  27. static object LI4();
  28. #define VMB4 register object *base=vs_top; object  V65; object Vcs[3];
  29. #define VMS4  register object *sup=vs_top+2;vs_top=sup;
  30. #define VMV4 vs_reserve(2);
  31. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  32. static object LI5();
  33. #define VMB5 register object *base=vs_top; object  V83; object Vcs[3];
  34. #define VMS5  register object *sup=vs_top+2;vs_top=sup;
  35. #define VMV5 vs_reserve(2);
  36. #define VMR5(VMT5) vs_top=base ; return(VMT5);
  37. static object LI6();
  38. #define VMB6 register object *base=vs_top; object  V101 ,V100; object Vcs[3];
  39. #define VMS6  register object *sup=vs_top+2;vs_top=sup;
  40. #define VMV6 vs_reserve(2);
  41. #define VMR6(VMT6) vs_top=base ; return(VMT6);
  42. static object LI7();
  43. #define VMB7 register object *base=vs_top; object  V110 ,V109; object Vcs[3];
  44. #define VMS7  register object *sup=vs_top+2;vs_top=sup;
  45. #define VMV7 vs_reserve(2);
  46. #define VMR7(VMT7) vs_top=base ; return(VMT7);
  47. #define VM7 2
  48. #define VM6 2
  49. #define VM5 2
  50. #define VM4 2
  51. #define VM3 2
  52. #define VM2 2
  53. #define VM1 7
  54. static char * VVi[19]={
  55. #define Cdata VV[18]
  56. (char *)(LI1),
  57. (char *)(&LI1key),
  58. (char *)(LI2),
  59. (char *)(LI3),
  60. (char *)(LI4),
  61. (char *)(LI5),
  62. (char *)(LI6),
  63. (char *)(LI7)
  64. };
  65. #define VV ((object *)VVi)
  66. static  LnkT17() ;
  67. static  (*Lnk17)() = LnkT17;
  68. static  LnkT16() ;
  69. static  (*Lnk16)() = LnkT16;
  70. static object  LnkTLI15() ;
  71. static object  (*LnkLI15)() = LnkTLI15;
  72. static object  LnkTLI14() ;
  73. static object  (*LnkLI14)() = LnkTLI14;
  74. static object  LnkTLI13() ;
  75. static object  (*LnkLI13)() = LnkTLI13;
  76.